home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
TPUG - Toronto PET Users Group
/
TPUG Users Group CD
/
TPUG Users Group CD.iso
/
CRS
/
crs55.d81
/
cpow1351.sda
/
MOUSE.TITLE
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2009-10-10
|
1KB
|
34 lines
100 OPEN 3,3 :REM OPEN 3,8,3,"TITLE,P,W"
110 GOSUB 1000:CLOSE3
120 GET A$:IF A$="" THEN 120
125 END
130 :
1000 PRINT#3,"[147][158]"
1010 PRINT#3,"[176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]"
1020 PRINT#3,"[221][156] [160] [211]ELF-[196]ISSOLVING-[193]RCHIVE [158][221]"
1030 PRINT#3,"[221][156] ([195])1986,1987 - [193]MPERE [205]ETAL [158][221]"
1040 PRINT#3,"[171][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][179]"
1050 PRINT#3,"[221][153] [158][221]"
1060 PRINT#3,"[221][153] [212]HIS [211][196][193] CONTAINS AN UPDATE TO THE [158][221]"
1070 PRINT#3,"[221][153] 1351 [205]OUSE [196]RIVER FOR [195]-[208]OWER [195]. [158][221]"
1080 PRINT#3,"[221][153] [158][221]"
1090 PRINT#3,"[221][153] [158][221]"
1100 PRINT#3,"[221][153] [212]HIS UPDATE IS ONLY BEEN TESTED [158][221]"
1110 PRINT#3,"[221][153] ON THE [195]OMMODORE [195]64 AND NOT THE [158][221]"
1120 PRINT#3,"[221][153] [195]OMMODORE [195]128. [201]F ONE FOR THE 128 [158][221]"
1130 PRINT#3,"[221][153] IS NEEDED, PLEASE CONTACT ME HEAR [158][221]"
1140 PRINT#3,"[221][153] ON [195][210][211], OR AT 416-238-8840 24HRS [158][221]"
1150 PRINT#3,"[221][153] [158][221]"
1160 PRINT#3,"[221][153] [158][221]"
1170 PRINT#3,"[221][153] [158][221]"
1180 PRINT#3,"[221][153] [194]ROUGHT TO YOU BY: [158][221]"
1190 PRINT#3,"[221][153] [154][205]IKE [194]YRON[153] 416-238-8840 [158][221]"
1200 PRINT#3,"[221][153] [158][221]"
1210 PRINT#3,"[221] [214]ERSION 1.35 [198]EB-8-93 [158][221]"
1220 PRINT#3,"[158][171][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][179]"
1230 PRINT#3,"[158][221][200]IT ANY KEY NOW TO CREATE[160] THE FILES[158][221]"
1240 PRINT#3,"[221]ON DRIVE 8, OR [156][210][213][206]/[211][212][207][208] TO ABORT. [158][221]"
1250 PRINT#3,"[158][173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]";
1260 RETURN
1270 END